home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacWorld 1996 April
/
Macworld (1996-04).dmg
/
Educational Demos
/
Encyclopedia of Nature
/
DATA
/
contentM.dir
/
00134_Script_134
< prev
next >
Wrap
Text File
|
1995-04-13
|
384b
|
19 lines
on soundfader chan
if soundBusy(chan) = true then
put the ticks + the volume of sound 1 into sttime
repeat while the volume of sound chan > chan
set the volume of sound chan = (sttime- the ticks)
updatestage
end repeat
sound stop chan
set the volume of sound chan = 255
set the soundLevel = 5
end if
end